home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / libs / wbstartlib.lha / WBStart / dev / c / examples / WBStarter.c < prev   
C/C++ Source or Header  |  1996-03-13  |  1KB  |  57 lines
  1. /*
  2.  * WBStarter.c  V2.0
  3.  *
  4.  * Start WB programs with wbstart.library
  5.  *
  6.  * (c) 1991-96 Stefan Becker
  7.  *
  8.  */
  9.  
  10. /* OS include files */
  11. #include <dos/dos.h>
  12. #include <libraries/wbstart.h>
  13.  
  14. /* OS function prototypes */
  15. #include <clib/dos_protos.h>
  16. #include <clib/wbstart_protos.h>
  17.  
  18. /* OS function inline calls */
  19. #include <pragmas/dos_pragmas.h>
  20. #include <pragmas/wbstart_pragmas.h>
  21.  
  22. /* ANSI C includes */
  23. #include <stdlib.h>
  24.  
  25. /* Library bases */
  26. extern struct Library *DOSBase, *SysBase, *WBStartBase;
  27.  
  28. /* Version string */
  29. static const char Version[]="$VER: WBStarter 2.0 (" __COMMODORE_DATE__ ")";
  30.  
  31. int main(int argc, char **argv)
  32. {
  33.  BPTR oldlock;
  34.  LONG rc      = RETURN_OK;
  35.  
  36.  /* Get current directory lock */
  37.  oldlock = CurrentDir(NULL);
  38.  
  39.  /* Scan argument list */
  40.  while (--argc)
  41.  
  42.   /* Start program */
  43.   if ((rc = WBStartTags(WBStart_Name,          *++argv,
  44.                         WBStart_DirectoryLock, oldlock,
  45.                         TAG_DONE))
  46.        != RETURN_OK)
  47.  
  48.    /* Error, leave loop */
  49.    break;
  50.  
  51.  /* Go back to old directory */
  52.  CurrentDir(oldlock);
  53.  
  54.  /* All OK! */
  55.  return(0);
  56. }
  57.